home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1995 April / macformat-023.iso / Demos / Others / PRODIGY® software folder / SCRIPT.R < prev    next >
Encoding:
Text File  |  1993-03-02  |  385 b   |  24 lines  |  [TEXT/????]
  1. /* 3/2/93 */
  2. /* Tymnet connect script 9600 */
  3. sleep {27}
  4. sendln {}
  5. sleep {1}
  6. sendln {}
  7. sleep {10}
  8. set_retries 10
  9. :START
  10. send {a}
  11. set_timeout 18
  12. receive {please log in:} goto SENDLOGIN
  13. retry START
  14. return 29  {No response from TYMNET}
  15. :SENDLOGIN
  16. set_retries 1
  17. :SENDLOGIN1
  18. sendln {prodigy}
  19. set_timeout 200
  20. receive {connect} goto END
  21. retry SENDLOGIN1
  22. return 46  {Can not access host}
  23. :END
  24.